home *** CD-ROM | disk | FTP | other *** search
- object frDBLookupFieldForm: TfrDBLookupFieldForm
- Left = 200
- Top = 108
- BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
- BorderStyle = bsDialog
- Caption = 'New lookup field'
- ClientHeight = 269
- ClientWidth = 241
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object GroupBox1: TGroupBox
- Left = 4
- Top = 8
- Width = 233
- Height = 97
- Caption = 'Field'
- TabOrder = 0
- object Label1: TLabel
- Left = 8
- Top = 20
- Width = 28
- Height = 13
- Caption = '&Name'
- FocusControl = NameE
- end
- object Label2: TLabel
- Left = 8
- Top = 44
- Width = 24
- Height = 13
- Caption = '&Type'
- FocusControl = TypeCB
- end
- object Label3: TLabel
- Left = 8
- Top = 68
- Width = 20
- Height = 13
- Caption = '&Size'
- FocusControl = SizeE
- end
- object NameE: TEdit
- Left = 100
- Top = 16
- Width = 121
- Height = 21
- HelpContext = 136
- TabOrder = 0
- end
- object TypeCB: TComboBox
- Left = 100
- Top = 40
- Width = 121
- Height = 21
- HelpContext = 145
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 1
- end
- object SizeE: TEdit
- Left = 100
- Top = 64
- Width = 45
- Height = 21
- HelpContext = 155
- TabOrder = 2
- end
- end
- object GroupBox2: TGroupBox
- Left = 4
- Top = 112
- Width = 233
- Height = 121
- Caption = 'Lookup definition'
- TabOrder = 1
- object Label4: TLabel
- Left = 8
- Top = 20
- Width = 40
- Height = 13
- Caption = '&Key field'
- FocusControl = lFieldCB
- end
- object Label5: TLabel
- Left = 8
- Top = 44
- Width = 37
- Height = 13
- Caption = '&Dataset'
- FocusControl = lDatasetCB
- end
- object Label6: TLabel
- Left = 8
- Top = 68
- Width = 56
- Height = 13
- Caption = '&Lookup key'
- FocusControl = lKeyCB
- end
- object Label7: TLabel
- Left = 8
- Top = 92
- Width = 52
- Height = 13
- Caption = '&Result field'
- FocusControl = lResultCB
- end
- object lFieldCB: TComboBox
- Left = 100
- Top = 16
- Width = 121
- Height = 21
- HelpContext = 191
- ItemHeight = 13
- TabOrder = 0
- end
- object lDatasetCB: TComboBox
- Left = 100
- Top = 40
- Width = 121
- Height = 21
- HelpContext = 163
- ItemHeight = 13
- TabOrder = 1
- OnChange = lDatasetCBChange
- end
- object lKeyCB: TComboBox
- Left = 100
- Top = 64
- Width = 121
- Height = 21
- HelpContext = 182
- ItemHeight = 13
- TabOrder = 2
- end
- object lResultCB: TComboBox
- Left = 100
- Top = 88
- Width = 121
- Height = 21
- HelpContext = 173
- ItemHeight = 13
- TabOrder = 3
- end
- end
- object Button1: TButton
- Left = 82
- Top = 240
- Width = 75
- Height = 25
- HelpContext = 40
- Caption = 'OK'
- Default = True
- TabOrder = 2
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 162
- Top = 240
- Width = 75
- Height = 25
- HelpContext = 50
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 3
- end
- end
-